﻿'*******************************************************************************************
'* Copyright Brügmann Software GmbH, Papenburg
'* Author: Björn Kremer
'* Contact: codeplex<at>patorg.de
'* 
'* VB.CMIS is a VB.NET implementation of the Content Management Interoperability Services (CMIS) standard
'*
'* This file is part of VB.CMIS.
'* 
'* VB.CMIS is free software: you can redistribute it and/or modify
'* it under the terms of the GNU Lesser General Public License as published by
'* the Free Software Foundation, either version 3 of the License, or
'* (at your option) any later version.
'* 
'* VB.CMIS is distributed in the hope that it will be useful,
'* but WITHOUT ANY WARRANTY; without even the implied warranty of
'* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
'* GNU Lesser General Public License for more details.
'* 
'* You should have received a copy of the GNU Lesser General Public License
'* along with VB.CMIS. If not, see <http://www.gnu.org/licenses/>.
'*******************************************************************************************
Public Class CMISLink
   Public Sub New(uri As Uri, rel As String, mediaType As String)
      _uri = uri
      _rel = rel
      _mediaType = mediaType
   End Sub
   Private _uri As Uri
   Private _rel As String
   Private _mediaType As String
   Public ReadOnly Property Uri As Uri
      Get
         Return _uri
      End Get
   End Property
   Public ReadOnly Property Rel As String
      Get
         Return _rel
      End Get
   End Property
   Public ReadOnly Property MediaType As String
      Get
         Return _mediaType
      End Get
   End Property
End Class